[GUI ] >>> BASIC Program Start (ZX Spectrum +2)
[GUI ]    1 POKE 23614,61: POKE 23613,4
[GUI ]    2 INK 5: PAPER 0: CLS 
[GUI ]    3 LET E$="Names MUST be between 1 and 10  letters long.                   PLEASE TRY AGAIN.":  LET T$="The book is obviously a Bible.\018\000  Certain verses have been        underlined by someone in the    past, & the front page bears    this legend 'Regular reading of the  scriptures will help you onyour path 2Tim3v16'."
[GUI ]    4 DIM k(11): DIM j(11): RESTORE 490: FOR x=1 TO 11: READ j(x): READ k(x): NEXT x
[GUI ]    5 [350 bytes of data hidden by Inkspector]
[GUI ]    6 LET q$="Your score is " : LET F$="%": LET z$="There are locations which you   have not visited on this        pilgrimage."
[GUI ]    7 DIM L(150): GO TO 10
[GUI ]    8 [443 bytes of data hidden by Inkspector]
[GUI ]   10  DEF FN f(n)=lo+(5*(n-1))
[GUI ]   15  DIM P(10): DIM O(n)
[GUI ]   20  LET O(1)=2: GO TO m
[GUI ]  400 PRINT : PRINT "Wind the saving tape on to a    free space. What do you want to call this position ?": PRINT 
[GUI ]  410 INPUT A$
[GUI ]  415 IF A$="" OR LEN A$>10 THEN PRINT E$: PRINT : GO TO 410
[GUI ]  420 SAVE A$ DATA l()
[GUI ]  430 GO TO nu
[GUI ]  450 PRINT : PRINT "What name is the name of the    position you wish to restore ?": PRINT 
[GUI ]  460 INPUT A$
[GUI ]  465 IF A$="" OR LEN A$>10 THEN PRINT E$: PRINT : GO TO 460
[GUI ]  466 PRINT : PRINT "start the tape": PRINT 
[GUI ]  470 LOAD A$ DATA L()
[GUI ]  472 PAPER k((L(125)/10)+1): INK j((L(125)/10)+1)
[GUI ]  475 CLS 
[GUI ]  480 GO TO 8
[GUI ]  490 [176 bytes of data hidden by Inkspector]
[GUI ]  500 LET W=(((cc-lo)/5)+1): LET L(W)=L(W)+1: IF L(W)=1 THEN LET scr=scr+10
[GUI ]  501 IF l(W)>5 THEN LET scr=scr-5
[GUI ]  502 IF scr<=0 THEN PRINT "Sorry you died before you found the answer....": GO TO e
[GUI ]  503 [443 bytes of data hidden by Inkspector]
[GUI ]  504 RESTORE cc
[GUI ]  505  READ c$
[GUI ]  506 LET ret=507: GO TO 4000
[GUI ]  507 PRINT : LET isc=INT (scr/12)
[GUI ]  508  IF isc>100 THEN LET isc=100
[GUI ]  509 PAPER k((isc/10)+1): INK j((isc/10)+1)
[GUI ]  510  PRINT "You are ";c$
[GUI ]  511 IF cc=5491 THEN BRIGHT 1 : PRINT q$ ; isc ;: LET ret=512: GO TO 6500
[GUI ]  512 BRIGHT 0: IF rb=0 AND cc=5001 THEN PRINT "There is an old book here."
[GUI ]  514  IF bu=1  THEN PRINT "There is a burden on your back."
[GUI ]  518 LET x=1
[GUI ]  520 READ P(x)
[GUI ]  525  IF P(x)=o  THEN GO TO 535
[GUI ]  530 LET x=x+1 :  GO TO 520
[GUI ]  535  READ R$ : LET nl=x
[GUI ]  590 INPUT LINE s$: IF LEN s$=o THEN GO TO nu
[GUI ]  591 PRINT : IF s\020\001\020\000$="quit" OR s$="QUIT" THEN GO TO 400
[GUI ]  592 IF s$="score" OR s$="SCORE" THEN PRINT q$ ; isc ; :  LET ret=590: GO TO 6500
[GUI ]  593 IF s$="restore" OR s$="RESTORE" THEN GO TO 450
[GUI ]  595 PRINT s$
[GUI ]  596  LET s$=s$+" "
[GUI ]  598 LET isc=INT (scr/12): IF isc>100 THEN LET isc=100
[GUI ]  605 DIM I(10)
[GUI ]  615  LET p=1
[GUI ]  620  LET w$=""
[GUI ]  625  FOR i=1 TO LEN s$
[GUI ]  630  LET i$=s$(i TO i)
[GUI ]  635 IF i$>="A"  AND i$<="Z" THEN LET i$=CHR$ (32+CODE i\020\001\020\000$)
[GUI ]  640 IF i$=" "  THEN GO TO 655
[GUI ]  645  LET w$=w$+i$
[GUI ]  650  GO TO 700
[GUI ]  655 LET ps=o
[GUI ]  660 LET ps=ps+1
[GUI ]  662 IF ps>nx THEN LET i$="": LET w$="": GO TO 700
[GUI ]  663 IF z(ps)<>1 THEN GO TO 660
[GUI ]  664 RESTORE sw+ps-1
[GUI ]  665 READ p$
[GUI ]  667 IF p$=h$ THEN GO TO 660
[GUI ]  675  IF p$<>w$ THEN GO TO 665
[GUI ]  680  LET I(p)=ps: LET i$="" : LET w$="" :  LET p=p+1 :  GO TO 700
[GUI ]  700  IF p>10  THEN LET p=10
[GUI ]  701 NEXT i
[GUI ]  702  GO TO 1000
[GUI ]  705  RESTORE cc+1
[GUI ]  710  LET p=1
[GUI ]  715  IF P(p)=o  THEN GO TO 745
[GUI ]  720  LET pc=1
[GUI ]  725  READ ph
[GUI ]  730  IF ph=o  THEN GO TO 740
[GUI ]  732  IF ph=I(pc)  THEN LET pc=pc+1 : GO TO 725
[GUI ]  733 LET pc=pc+1: IF pc>10  THEN GO TO 736
[GUI ]  735 GO TO 732
[GUI ]  736 READ ph: IF ph<>o  THEN GO TO 736
[GUI ]  737 LET p=p+1
[GUI ]  738 GO TO 715
[GUI ]  740 IF LEN M$>o THEN PRINT : PRINT "That was ";M$: PRINT : LET M$=""
[GUI ]  741 GO TO P(p)+ac 
[GUI ]  745  IF I(1)=o THEN GO TO 747
[GUI ]  746 PRINT "Please be more specific": GO TO 750
[GUI ]  747  PRINT "I'm sorry I don't understand." : LET scr=scr-2 
[GUI ]  750 GO TO m
[GUI ]  751 GO TO m
[GUI ] 1000 IF rb=0 AND I(2)=10 AND I(1)=21 THEN PRINT "You havent got it !"
[GUI ] 1005  IF I(1)=21  AND I(2)=10  AND rb=1  THEN GO TO 1030
[GUI ] 1010  IF I(1)=21  AND I(2)=44  AND sc=1  THEN GO TO 1060
[GUI ] 1020 GO TO 705
[GUI ] 1030 PRINT R$
[GUI ] 1035 IF fr=1 THEN PRINT T$: LET fr=0
[GUI ] 1040 IF rb1=1 THEN GO TO nu
[GUI ] 1042 IF cc=FN f(101) THEN LET scr=scr+50: GO TO 1050
[GUI ] 1043 IF cc=FN f(102) THEN LET scr=scr+25: GO TO 1050
[GUI ] 1045 GO TO nu
[GUI ] 1050 LET rb1=1: LET cc=FN f(4): LET bu=1: GO TO m
[GUI ] 1060 INK 2: PAPER 6: PRINT "Admit Christian - a pilgrim to  the HOLY CITY, whose sins I     have forgiven.";
[GUI ] 1070 PRINT TAB (24);"I.N.R.I.": INK 2: PAPER 7
[GUI ] 1080  GO TO nu
[GUI ] 2001  LET cc=FN f(2)
[GUI ] 2002  GO TO m
[GUI ] 2004  IF tf=1 THEN LET cc=FN f(3): GO TO m
[GUI ] 2005 GO TO nu
[GUI ] 2006  IF pf=1 THEN PRINT "That wasn't very clever. You gotoff lightly with 2 broken legs  and a dislocated shoulder. Aftera long convalescence......":  GO TO m
[GUI ] 2007 PRINT "Please be more specific": GO TO nu
[GUI ] 2011 PRINT "Are you serious ?": LET pf=1: GO TO nu
[GUI ] 2014  GO TO m
[GUI ] 2016 PRINT "That was just what you needed.  After a heavy meal ....": LET cc=FN f(100): GO TO m
[GUI ] 2020 LET scr=scr-15: LET tf=o: LET cc=FN f(100): GO TO m
[GUI ] 2021 PRINT "A soldier stops you. 'Don't you realise there's a curfew on ?   This city is under seige.' He   hurries away.": LET cc=FN f(102): GO TO m
[GUI ] 2026 IF tf=1 THEN LET cc=FN f(101): PRINT "Your persistence is rewarded.": LET scr=scr+10: GO TO m
[GUI ] 2027  PRINT "Your family want you to eat     something first.": LET tf=1:  GO TO nu
[GUI ] 2031 LET scr=scr-15:  LET cc=FN f(1): GO TO m
[GUI ] 2036  LET cc=FN f(5): GO TO m
[GUI ] 2041  LET cc=FN f(6): GO TO m
[GUI ] 2046  LET cc=FN f(7): GO TO m
[GUI ] 2051 PRINT "RUN & don't look back.": GO TO e
[GUI ] 2056  LET scr=scr+50: LET cc=FN f(14) : GO TO m
[GUI ] 2057 LET cc=FN f(9): GO TO m
[GUI ] 2061  LET cc=FN f(8): GO TO m
[GUI ] 2071  LET cc=FN f(10):  GO TO m
[GUI ] 2076 IF plf=0  THEN LET plf=1: PRINT "Pliable has struggled out & goeshome shaking his fist at you.": GO TO nu
[GUI ] 2077 GO TO 745
[GUI ] 2081 LET cc=FN f(11): GO TO m
[GUI ] 2086 LET cc=FN f(13):  GO TO m
[GUI ] 2091  LET cc=FN f(12):  GO TO m
[GUI ] 2096 IF g=0 THEN PRINT "\020\001\020\000The gate is closed !": GO TO nu
[GUI ] 2097 LET cc=FN f(15): GO TO m
[GUI ] 2101 LET g=1:  PRINT "The gate creaks open ...":  GO TO nu
[GUI ] 2102 LET cc=FN f(103): GO TO m
[GUI ] 2106 PRINT "Evangelist points to the road   stretching west. 'There are no  short-cuts to the Kingdom of    God, my friend.'":  LET cc=FN f(12): LET go=1: GO TO m
[GUI ] 2111 PRINT "\020\001\020\000You have left the way to follow worldly wisdom (lk13v3).":  GO TO nu
[GUI ] 2116 LET go=go+1: BEEP go/3,go*2 
[GUI ] 2117  IF go<>3 THEN PRINT "The flames are growing stronger.If you remain obstinate they    will destroy you !": LET scr=scr-15:  GO TO nu
[GUI ] 2118 PRINT "You have been badly burnt & are unable to continue. You return  to the City of Destruction.":  GO TO e
[GUI ] 2121 PRINT "You follow Wanton but she is tooquick for you.":  LET cc=FN f(9): LET scr=scr-10: GO TO m
[GUI ] 2126 LET cc=FN f(12): GO TO m
[GUI ] 2131 LET cc=FN f(16):  GO TO m
[GUI ] 2136 LET cc=FN f(17): GO TO m
[GUI ] 2137 LET cc=FN f(106): GO TO m
[GUI ] 2141 PRINT "The room is made clean. This    shows the contrast between dry  legalism and the grace of God   cleansing you by baptism.       (Acts22v16 & Jn7v37-39).":  LET cc=FN f(18):  GO TO m
[GUI ] 2146 LET sp=1:  PRINT "The dust has settled !": GO TO nu
[GUI ] 2151 IF sp=0  THEN PRINT "As you sweep the dust rises &   begins to choke you !":  GO TO nu
[GUI ] 2152 GO TO 2141
[GUI ] 2156 PRINT "You cannot serve both GOD & money.": GO TO e
[GUI ] 2161 LET scr=scr+10: PRINT "Patience puts it back on the    floor.": LET cc=FN f(19): GO TO m
[GUI ] 2165 PRINT "Who to ?": GO TO 590
[GUI ] 2166 PRINT "He gathers it gleefully & runs  off. He soon returns pennyless." :  LET cc=FN f(19) : GO TO m
[GUI ] 2171 LET cc=FN f(20): GO TO m
[GUI ] 2176 LET cc=FN f(21):  GO TO m
[GUI ] 2181 PRINT "The fire burns brighter.": GO TO 590
[GUI ] 2186 LET cc=FN f(22): GO TO m
[GUI ] 2191 LET cc=FN f(23): GO TO m
[GUI ] 2196 GO TO 2191
[GUI ] 2201 LET cc=FN f(24):  GO TO m
[GUI ] 2206 PRINT "Heb3v7-19" :  GO TO 2212
[GUI ] 2211 LET scr=scr+5
[GUI ] 2212 LET cc=FN f(25): GO TO m
[GUI ] 2216 PRINT "Mat13v40-42,Mat24v42-44": LET cc=FN f(26): GO TO m
[GUI ] 2221 LET scr=scr+5: LET cc=FN f(26): GO TO m
[GUI ] 2226 LET cc=FN f(27): GO TO m
[GUI ] 2231 LET cc=FN f(28): LET bu=0: GO TO m
[GUI ] 2236 LET cc=FN f(29): LET bu=0: GO TO m
[GUI ] 2241 PRINT "Your burden returns & you are   forced to the foot of the cross." : LET bu=1 : LET fc=fc+1 : IF fc=2 THEN PRINT "An angelic voice whispers 'Have you gazed on the wonderous crosswhere upon your burdens were    placed ?'" 
[GUI ] 2242 GO TO nu
[GUI ] 2246 IF sc=0 THEN LET scr=scr+100: LET sc=1 
[GUI ] 2247 GO TO nu
[GUI ] 2251 LET cc=FN f(30): GO TO m
[GUI ] 2256 LET scr=scr+10: GO TO 2261
[GUI ] 2261 LET cc=FN f(31): GO TO m
[GUI ] 2266 LET cc=FN f(32): GO TO m
[GUI ] 2271 PRINT "The argument continues ...": LET scr=scr-5: GO TO nu
[GUI ] 2276 LET cc=FN f(33): GO TO m
[GUI ] 2281 LET cc=FN f(34): GO TO m
[GUI ] 2286 PRINT "You are not alert !             (Judges7v5-7).": GO TO e
[GUI ] 2291 IF wh=0 THEN LET cc=FN f(35): GO TO m
[GUI ] 2292 LET cc=FN f(36): GO TO m
[GUI ] 2296 LET wh=1:  PRINT "you are refreshed": GO TO nu
[GUI ] 2301 PRINT "Adam curses you as you leave.   A little way off from the hill  you are caught by a man who     reprimands you. Evangelist      appears  'That man was Moses whois most severe to those who givein to temptation.'" :  LET cc=FN f(33) : GO TO m
[GUI ] 2306 LET cc=FN f(36): GO TO m
[GUI ] 2311 LET cc=FN f(33): GO TO m
[GUI ] 2316 LET scr=scr-30: LET lsc=o: PRINT "You are rudely awakened &       advised to read Prov 20v13.": IF sc=1 THEN LET lsc=1: LET sc=0
[GUI ] 2317 GO TO 2322
[GUI ] 2321 LET lsc=0
[GUI ] 2322 LET cc=FN f(37): GO TO m
[GUI ] 2326 PRINT "Lk9v62": GO TO e
[GUI ] 2331 IF lsc=0 THEN LET cc=FN f(40):  GO TO m
[GUI ] 2332  LET cc=FN f(38): GO TO m
[GUI ] 2336 LET sc=0: LET cc=FN f(39): GO TO m
[GUI ] 2341 LET scr=scr+5: LET sc=1: LET cc=FN f(40): GO TO m
[GUI ] 2344  LET cc=FN f(40): GO TO m
[GUI ] 2346 LET cc=FN f(41): GO TO m
[GUI ] 2347 LET scr=scr-40: LET cc=FN f(107): GO TO m
[GUI ] 2351 LET hf=1: PRINT "The lions are chained !!": GO TO nu
[GUI ] 2356 IF hf=1 THEN GO TO 2346
[GUI ] 2357 GO TO 745
[GUI ] 2361 LET bl=1: LET cc=FN f(42): GO TO m
[GUI ] 2366  LET lb=1: LET cc=FN f(43): GO TO m
[GUI ] 2371 IF bl=1  AND lb=1  THEN LET cc=FN f(44): GO TO m
[GUI ] 2372  GO TO 745
[GUI ] 2376 LET cc=FN f(41):  GO TO m
[GUI ] 2381 GO TO 2376
[GUI ] 2386 LET scr=scr+20: LET cc=FN f(46): GO TO m
[GUI ] 2391 LET cc=FN f(45): GO TO m
[GUI ] 2401 PRINT "A suit of armour materialises onyour body.": LET cc=FN f(46): GO TO m
[GUI ] 2406 LET cc=FN f(47): GO TO m
[GUI ] 2411 LET cc=FN f(48): GO TO m
[GUI ] 2416 GO TO e
[GUI ] 2421 PRINT "You move & parry it with your   shield.": LET cc=FN f(49): GO TO m
[GUI ] 2426 GO TO e
[GUI ] 2431 LET cc=FN f(50): GO TO m
[GUI ] 2436 GO TO e
[GUI ] 2441 LET cc=FN f(51): GO TO m
[GUI ] 2446 GO TO 2441
[GUI ] 2451 PRINT "Your wounds are healed.": LET scr=scr+10: LET cc=FN f(52): GO TO m
[GUI ] 2456 GO TO 2451
[GUI ] 2461 LET cc=FN f(52): GO TO m
[GUI ] 2466 LET cc=FN f(53): GO TO m
[GUI ] 2471 PRINT "Your fear grows." : GO TO nu
[GUI ] 2476 PRINT "Boasting of your speed you      stumble (Prov29v23) !"
[GUI ] 2477 LET cc=FN f(54): GO TO m
[GUI ] 2481 GO TO 2477
[GUI ] 2486 LET cc=FN f(55): GO TO m
[GUI ] 2491 LET cc=FN f(56): GO TO m
[GUI ] 2496 LET th=th+1
[GUI ] 2497 IF th>=3 THEN PRINT "Your companion asks you to read Romans12 & Galatians5&6 !"
[GUI ] 2498 GO TO nu
[GUI ] 2501 LET cc=FN f(57): GO TO m
[GUI ] 2506 LET cc=FN f(58): GO TO m
[GUI ] 2511 LET cc=FN f(60): GO TO m
[GUI ] 2516 LET cc=FN f(59): GO TO m
[GUI ] 2521 LET cc=FN f(61): GO TO m
[GUI ] 2526 LET cc=FN f(62): GO TO m
[GUI ] 2531 LET no=no+1: LET scr=scr+5
[GUI ] 2532 IF no=3 THEN LET cc=FN f(63): GO TO m
[GUI ] 2533 LET cc=FN f(58): GO TO m
[GUI ] 2536 PRINT "Mat6v19-21!": GO TO e
[GUI ] 2541 PRINT "You are beaten by the mob."
[GUI ] 2542 LET cc=FN f(64): GO TO m
[GUI ] 2546 REM {C} JPH Day 1984
[GUI ] 2547 LET cc=FN f(65): GO TO m
[GUI ] 2551 LET cc=FN f(66): GO TO m
[GUI ] 2556 GO TO 2551
[GUI ] 2561 LET cc=FN f(68): GO TO m
[GUI ] 2566 LET cc=FN f(67): GO TO m
[GUI ] 2571 GO TO 2566
[GUI ] 2576 LET cc=FN f(69): GO TO m
[GUI ] 2581 LET cc=FN f(97): GO TO m
[GUI ] 2586 LET cc=FN f(70): GO TO m
[GUI ] 2591 LET cc=FN f(71): GO TO m
[GUI ] 2596 PRINT "For your instruction 2Tim4v10 !": GO TO e
[GUI ] 2601 PRINT "Behind you Love-gain & his      companions disappear from the   way, never to be seen again !": LET cc=FN f(72): GO TO m
[GUI ] 2606 GO TO 2601
[GUI ] 2611 GO TO 2601
[GUI ] 2616 LET cc=FN f(73): GO TO m
[GUI ] 2618 PRINT "lot's wife was turned to salt   for looking back. So were you !": GO TO e
[GUI ] 2621 GO TO 2616
[GUI ] 2626 LET cc=FN f(80): GO TO m
[GUI ] 2631 LET cc=FN f(74): GO TO m
[GUI ] 2636 LET cc=FN f(75): GO TO m
[GUI ] 2641 PRINT "The storm is getting worse !": GO TO nu
[GUI ] 2646 PRINT "You find shelter, but during thenight a giant, Despair, awakens you & takes you to \020\000Doubting     Castle.": LET cc=FN f(76): GO TO m
[GUI ] 2651 LET cc=FN f(77): GO TO m
[GUI ] 2656 LET cc=FN f(78): GO TO m
[GUI ] 2661 LET cc=FN f(79): GO TO m
[GUI ] 2666 IF ff=0  THEN PRINT "The door is locked": GO TO 590
[GUI ] 2667 PRINT "After erecting a warning you    continue on to the Delectable   Mountains. Here you meet four   shepherds - Knowledge,          Experience,Watchful & Sincere."
[GUI ] 2668 LET cc=FN f(80): GO TO m
[GUI ] 2671 GO TO 2666
[GUI ] 2676 LET ff=1: PRINT "Your Faith is a key.": GO TO nu
[GUI ] 2681 LET cc=FN f(76): GO TO m
[GUI ] 2686 GO TO 2681
[GUI ] 2691 GO TO 2681
[GUI ] 2696 LET vt=vt+1: LET cc=FN f(83): GO TO m
[GUI ] 2701 LET vt=vt+1: LET cc=FN f(81): GO TO m
[GUI ] 2706 LET vt=vt+1: LET cc=FN f(82): GO TO m
[GUI ] 2711 IF vt>=3 THEN LET cc=FN f(85): GO TO m
[GUI ] 2712 GO TO nu
[GUI ] 2716 LET cc=FN f(80): GO TO m
[GUI ] 2721 GO TO 2716
[GUI ] 2726 PAPER 2: INK 7: BRIGHT 1: FLASH 1:  PRINT "You are in Hell, from which     there is no escape !": FLASH 0: BRIGHT 0: LET ret=e: LET tune=8000: GO TO 7000
[GUI ] 2731 LET cc=FN f(80): GO TO m
[GUI ] 2736  REM {C} J.P.H.DAY 1984
[GUI ] 2741 LET cc=FN f(86): GO TO m
[GUI ] 2746 PRINT "\020\000Ignorance is following you.": LET cc=FN f(87): GO TO m
[GUI ] 2751 LET cc=FN f(88): GO TO m
[GUI ] 2756 GO TO 2751
[GUI ] 2761 PRINT "Great Grace frightens them off.": LET cc=FN f(89): GO TO m
[GUI ] 2766 LET cc=FN f(91): GO TO m
[GUI ] 2771 LET cc=FN f(90): LET scr=scr-20: GO TO m
[GUI ] 2776 PRINT "An Angel appears &  tells you   to read 2Cor11v13-14. He sets   you back on your feet.": LET cc=FN f(91): GO TO m
[GUI ] 2781 GO TO e
[GUI ] 2786 LET cc=FN f(92): GO TO m
[GUI ] 2791 PRINT "You fall into a deep sleep from which there is no waking.": GO TO e
[GUI ] 2796 LET cc=FN f(93): GO TO m
[GUI ] 2801 PRINT "You go too fast, Ignorance says 'I cannot keep up with you.'": LET cc=FN f(94): GO TO m
[GUI ] 2811 PRINT "Ignorance says 'You are too     fast for me. I can't keep up"
[GUI ] 2816 LET cc=FN f(95): GO TO m
[GUI ] 2821 PRINT "You swim to the other side.": LET cc=FN f(96): GO TO m
[GUI ] 2826 PRINT "Ps66v12,Acts8v26-40": GO TO nu
[GUI ] 2831 LET cc=FN f(97): LET ret=m: LET tune=8030: GO TO 7000
[GUI ] 2836 PRINT "Ignorance who has been rowed    over the river by Vain-hope, a  ferryman, joins you.": LET cc=FN f(98): GO TO m
[GUI ] 2841 IF sc=1 THEN PRINT "You are given a Harp & Crown.   You see Ignorance, who has no   scroll, being thrown off the    hill into Hell.": LET cc=FN f(99): LET tune=8010: LET ret=m: GO TO 7000
[GUI ] 2842 PRINT "You have no scroll !": IF lsc=1 THEN PRINT "You lost it at the Shady place  whilst asleep. If you had but   had the  foresight to repent &  return... PLACE A HIGH VALUE ON SALVATION NEXT TIME."
[GUI ] 2843 GO TO nu
[GUI ] 2846 LET scr=scr/4: PRINT "You see your companion being    admitted to Heaven, but you     join Ignorance in being thrown  out into Hell.": GO TO 2726
[GUI ] 2851 GO TO nu
[GUI ] 2856  LET rb=1: GO TO nu
[GUI ] 2858 LET cc=FN f(14): GO TO m
[GUI ] 2860 PRINT "Forgive me for interrupting but I feel it my duty to point out  that someone doesn't like you   and is shooting arrows at you.": LET cc=FN f(104): GO TO m
[GUI ] 2862 LET cc=FN f(105): GO TO m
[GUI ] 2864 LET cc=FN f(40): GO TO m
[GUI ] 4000 LET co=o
[GUI ] 4005 DIM z(nx)
[GUI ] 4008 LET z(10)=1: LET z(21)=1: LET z(44)=1
[GUI ] 4010 READ x
[GUI ] 4020 IF x=0 THEN GO TO 4050
[GUI ] 4030 LET co=co+1
[GUI ] 4040 GO TO 4010
[GUI ] 4050 READ R$: READ M$: RESTORE cc+1
[GUI ] 4060 READ x
[GUI ] 4070 IF x=o THEN GO TO 4100
[GUI ] 4080 LET z(x)=1
[GUI ] 4090 GO TO 4060
[GUI ] 4100 LET co=co-1
[GUI ] 4110 IF co>o THEN GO TO 4060
[GUI ] 4120 RESTORE cc
[GUI ] 4130 READ c$
[GUI ] 4140 GO TO ret
[GUI ] 5001  DATA "in the bedroom of your  house. Through an open window   you can see the city sprawling  before you. Stairs lead down.",1,6,11,856,o,"Ps119v105-120",""
[GUI ] 5002  DATA 5,o,53,o,25,o,24,10,o
[GUI ] 5006 DATA "in the living room. Yourfamily are here. A door leads   out onto the street.",26,26,31,4,o,"Gen19v17,Ex9v28",""
[GUI ] 5007  DATA 27,o,7,o,6,o,o
[GUI ] 5011 DATA "in the living room wherea splendid meal has been set    before you.",16,26,26,31,o,"Mat6v33",""
[GUI ] 5012  DATA 19,o,27,o,7,o,6,o
[GUI ] 5016 DATA "convinced of great      danger (Gen19v12-13 & Is59v1-2).There is a man here who looks   helpful. Suddenly it is as if...",36,0,"Lk 11v9","Evangelist."
[GUI ] 5017  DATA 13,14,o
[GUI ] 5021  DATA "shown Acts ch 2. 'This  city is about to be destroyed   because of its sinfulness. If   you will become a pilgrim you   will find salvation. See here isa secret way out of the city.'  A narrow path stretches north.",41,o,"Jn 3v16",""
[GUI ] 5022 DATA 1,o
[GUI ] 5026 DATA "outside the town. Behindyou your neighbours shout Stop !Stop ! - they are chasing after you. Remember Lot's wife !",46,51,o,"1Cor9v24",""
[GUI ] 5027  DATA 11,o,o
[GUI ] 5031 DATA "at an east-west fork in the road. A sign says 'By faith you are saved.'",56,61,61,o,"2Cor5v7",""
[GUI ] 5032  DATA 18,20,o,3,o,4,o
[GUI ] 5036 DATA "caught by a man who askswhere you are going.",57,o,"Jas1v2-8","Pliable your neighbour."
[GUI ] 5037  DATA o
[GUI ] 5041  DATA "in the                  \020\001\020\000SLOUGH OF DESPOND.",71,76,o,"Ps12",""
[GUI ] 5042 DATA 28,o,o
[GUI ] 5046 DATA "back on your feet. Help says 'Did you not see the sign? you could have avoided this.'   A road stretches west.",81,o,"Ps119v105-112",""
[GUI ] 5047 DATA 4,o
[GUI ] 5051 DATA "joined on the road by a man. 'Leave the road & take a   short-cut I know.'",86,91,o,"Deut5v32","Worldly-wiseman."
[GUI ] 5052 DATA 29,30,o,4,o
[GUI ] 5056 DATA "at a narrow gate in a   great wall on the north side of a valley. To the south lies a   large castle rising impressivelyout of a thick forest.",102,96,101,o,"Mat7v7",""
[GUI ] 5057  DATA 2,o,26,o,31,o
[GUI ] 5061 DATA "at the foot of a hill & surrounded by violent flames.   You fear for your \020\001DESTRUCTION\020\000!. Evangelist appears !"\020\000,106,111,116,o,"Deut32v7",""
[GUI ] 5062  DATA 32,o,13,14,o,o
[GUI ] 5066 DATA "met by a beautiful      maiden, she asks you to follow  her.",121,126,o,"Prov7","Wanton."
[GUI ] 5067 DATA 33,o,o
[GUI ] 5071 DATA "quickly pulled inside bya man. 'Hasten from the gate    lest you be shot.' The devil's  castle is opposite the gate.    The road leads east.",131,o,"Jer48v6","Goodwill."
[GUI ] 5072 DATA 3,o
[GUI ] 5076 DATA "standing outside a      large house. The owner greets   you warmly. 'I will show you    many things !' He looks friendlyand well informed. A small path leads off into a thicket.",137,136,o,"Prov2","The Interpreter."
[GUI ] 5077  DATA 66,o,26,o
[GUI ] 5081 DATA "shown to a dusty room,  empty except for a pail of water& a portrait of a serious man.  The Interpreter says 'This man  can make you anew (Jn3v1-15').  He then asks you to sweep the   floor.",141,141,146,146,151,o,"Jn6v35-37",""
[GUI ] 5082 DATA 34,35,o,46,35,o,46,o,34,o,35,o
[GUI ] 5086 DATA "joined by Passion &     \020\000Patience, you are presented witha bag of gold, will you spend itor give it away ?",156,161,166,165,o,"Acts20v35",""
[GUI ] 5087  DATA 39,o,36,37,o,36,38,o,36,o
[GUI ] 5091 DATA "to choose a verse to    explain this - Mat6v19-24,      Mat27v1-11 or Lk15v11-31",171,o,"Ecc7v8",""
[GUI ] 5092  DATA 8,o
[GUI ] 5096 DATA "at wall, a fire burns   brightly, there is a pail of    water here, the wall ends a few feet to the east",176,181,o,"1Thes5",""
[GUI ] 5097 DATA 3,o,46,o
[GUI ] 5101 DATA "behind the wall. A      Serious Man is pouring oil on   the fire to keep it alight.     Which verse explains this       Rev1v12-18, Mat25v1-13, or      Acts2v3-4 ?",186,o,"Mat4v11","the man in the picture."
[GUI ] 5102 DATA 9,o
[GUI ] 5106 DATA "outside a gateway. Armedsoldiers stand guard, preventingyou from entering.",191,o,"Rom8v31",""
[GUI ] 5107  DATA 40,o
[GUI ] 5111 DATA "to choose a verse to    explain this. Rom8v37,Heb11",201,o,"Heb3v6",""
[GUI ] 5112 DATA 15,o
[GUI ] 5116 DATA "outside an iron cage.   Inside it is a dejected looking man.",206,211,o,"Heb6v4-6","Backslider - a man     trapped by a hard heart."
[GUI ] 5117  DATA 13,o,16,o
[GUI ] 5121 DATA "standing opposite a     trembling man.",216,221,o,"2Pet3","Unready - a man not    ready forjudgement."
[GUI ] 5122  DATA 13,o,17,o
[GUI ] 5126 DATA "bid farewell by the     Interpreter. A steep climb is   before you.",226,o,"ps24v3",""
[GUI ] 5127 DATA 6,o
[GUI ] 5131  DATA "half way up the hill.   A walled road with 'SALVATION'  written on it appears just aboveyou.",231,o,"Rom13v11",""
[GUI ] 5132 DATA 6,o
[GUI ] 5136 DATA "at a large wooden cross.Your burden falls away ...      (Gal2v20) !",236,236,236,236,241,o,"Lk23v26-43",""
[GUI ] 5137  DATA 41,o,42,o,43,o,22,o,o
[GUI ] 5141  DATA "visited by Angels       bearing a scroll. To the north  a narrow road winds into the    distance.",246,251,o,"Rev20v15",""
[GUI ] 5142 DATA 24,44,o,1,o
[GUI ] 5146 DATA "standing in front of 3  men asleep in the road.",261,256,o,"2Thes3v6",""
[GUI ] 5147 DATA 79,o,82,o
[GUI ] 5151 DATA "met by 2 men who try to detain you in endless argument.",266,266,271,o,"1Tim1v3-11","Formalist & his friend Hipocrisy."
[GUI ] 5152 DATA 75,o,79,o,o
[GUI ] 5156 DATA "near the HILL OF        DIFFICULTY. A man greets you    & asks you to live with him &   his daugters.",276,276,281,o,"1Cor6v9","Adam from the city of  DECEIT."
[GUI ] 5157  DATA 48,o,12,o,o
[GUI ] 5161 DATA "at the foot of the HILL OF DIFFICULTY where there is a  small stream. You sense the     presence of an unseen foe but   all seems to be quiet.",286,291,296,o,"Jg7v5",""
[GUI ] 5162 DATA 45,46,o,6,o,47,46,o
[GUI ] 5166  DATA "at Adam's house. He      introduces his three buxom      daughters. 1Cor6v9.",301,301,301,o,"2Sam15v14",""
[GUI ] 5167 DATA 48,o,29,o,71,o,o,o
[GUI ] 5171 DATA "very thirsty !",306,311,o,"Jn7v37",""
[GUI ] 5172 DATA 78,o,o
[GUI ] 5176 DATA "in a shady place and    very tired.",316,321,o,"Prov6v6",""
[GUI ] 5177 DATA 49,o,50,o
[GUI ] 5181 DATA "approached by 2 people  & advised to return.",326,331,o,"Is41v10","Timorous & his friend  Mistrust."
[GUI ] 5182 DATA 52,o,o
[GUI ] 5186 DATA "still on the road but   the scroll is missing !!!!",336,o,"Is30v15,2Chr6v24-25,Mk14v40",""
[GUI ] 5187 DATA 32,52,o
[GUI ] 5191 DATA "at the shady place. The scroll is here. It would not    have slipped out of your pocket if you had not been lazy and    slept. Prov6v6.",341,344,o,"Lk15v10","a narrow escape !"
[GUI ] 5192 DATA 24,44,o,o
[GUI ] 5196 DATA "outside a lavish palace.The entrance is flanked by two  lions ! A path leads off east.  The signpost says SHORT-CUT.",347,346,351,356,o,"Dan6",""
[GUI ] 5197 DATA 3,o,18,20,o,28,o,o
[GUI ] 5201  DATA "inside the palace's     great hall. Discretion, the     master, introduces his family   Prudence, Piety & Charity. You  talk long into the night about  the Lord. Exits are an old oak  panelled door or the staircase.",361,366,371,o,"Jn12v23-26",""
[GUI ] 5202 DATA 6,o,7,o,o
[GUI ] 5206 DATA "lead to a balcony where Piety shows you the Delectable  mountains & in the distance the gleam of the Heavenly City.",376,o,"Rev21v11",""
[GUI ] 5207 DATA 5,o
[GUI ] 5211 DATA "in the library, full of books about the Lord, proving   Him to be the SON OF GOD. The   only exit is through the door." ,381,o,"Jn14v6",""
[GUI ] 5212 DATA 7,o
[GUI ] 5216 DATA "asked 'Have you armour  to face the dangers ahead ?'",386,391,o,"Eph6v10-20",""
[GUI ] 5217 DATA 53,o,54,o
[GUI ] 5221 DATA "in the armoury. There isa sign which says 'Eph6v10-20'.",401,o,"Eph6v11",""
[GUI ] 5222 DATA 24,55,o
[GUI ] 5226 DATA "directed to a road whichstretches away down the hill.   The girls accompany you for someway.",406,o,"Phil3v14",""
[GUI ] 5227 DATA 5,o
[GUI ] 5231 DATA "met by a man who warns  you that you are heading toward the Valley of Humiliation & thatyou must return at once !",411,416,o,"Phil4v11","Discontent."
[GUI ] 5232 DATA 5,o,52,o
[GUI ] 5236 DATA "in the Valley of        Humiliation. A dragon appears & throws a dart at you.",421,426,o,"Eph6v16","Apollyon."
[GUI ] 5237 DATA 20,o,o
[GUI ] 5241 DATA "told by Apollyon that aslord of the City of Destruction he claims your allegiance !",431,436,o,"Rom7v4-6,Eph6v14",""
[GUI ] 5242 DATA 56,57,o,o
[GUI ] 5246 DATA "attacked by Apollyon,   who shows no mercy !",441,446,o,"Eph6v17",""
[GUI ] 5247  DATA 58,o,77,o
[GUI ] 5251 DATA "victorious after a      fight. Apollyon flies away      wounded. You are also wounded",451,456,461,o,"Jas5v13-16",""
[GUI ] 5252 DATA 22,59,o,36,60,o,o
[GUI ] 5256 DATA "attacked again, this    time by unseen foes !",466,471,o,"Eph6v18",""
[GUI ] 5257 DATA 22,o,o
[GUI ] 5261 DATA "joined by a companion.  You are tempted to boast of yourspeed.",481,476,o,"2Cor11v30",""
[GUI ] 5262 DATA 76,o,o
[GUI ] 5266 DATA "stopped on the road by  a man. He says 'Religion is for those who have weak consciences !'. Your reply ?",486,o,"1Cor1v27","Shame."
[GUI ] 5267 DATA 61,o
[GUI ] 5271 DATA "now joined by someone   who seems to have all the       answers, but you are uneasy     about him.",491,496,o,"Jas3,1Tim1v6-11","Talkative."
[GUI ] 5272 DATA 75,o,o
[GUI ] 5276 DATA "reminded by your        companion of 1Tim 6v5. Talkativestorms off. Evangelist appears. 'There are many dangers ahead,' he says, 'but ... 1Pt1v3-12. Askone question.'",501,o,"Acts7v54-60",""
[GUI ] 5277 DATA 13,o,"lk12v8"
[GUI ] 5281 DATA "almost out of the       wilderness, one of you will     be martyred, but be encouraged  by Rev 2v10 & Acts 14v22, the   road continues west ...",506,o,"Ezek40v4",""
[GUI ] 5282 DATA 4,o
[GUI ] 5286 DATA "in the market square of a small town. All worldly       delights are sold here. Explore using directions.",511,516,521,526,o,"Col3v2",""
[GUI ] 5287 DATA 1,o,2,o,3,o,4,o
[GUI ] 5291 DATA "offered lucky charms.   Do you wish to buy them ?",536,531,o,"Col3v2",""
[GUI ] 5292 DATA 53,o,54,o
[GUI ] 5296 DATA "offered power. Do you   wish to buy it ?",536,531,o,"Mat4v10",""
[GUI ] 5297 DATA 53,o,54,o
[GUI ] 5301 DATA "offered fame. do you    wish to buy it ?",536,531,o,"Col3v2",""
[GUI ] 5302 DATA 53,o,54,o
[GUI ] 5306 DATA "offered luxuries. Do youwish to buy them ?",536,531,o,"Col3v2",""
[GUI ] 5307 DATA 53,o,54,o
[GUI ] 5311 DATA "the cause of a riot     amongst the traders because you will not buy. The town's mayor  arrives.",541,o,"1Thes4v1",""
[GUI ] 5312 DATA o
[GUI ] 5316 DATA "in prison !",546,o,"Acts16v16-40",""
[GUI ] 5317 DATA o
[GUI ] 5321 DATA "on trial, before Judge  Hate-good. The witnesses for    the prosecution are Envy,       Superstition, Fame-Hungry &     Pickthank. 'You ruin our trade  by your faith. What do you say  in your defence ?'",551,556,o,"1Thes4v1",""
[GUI ] 5322 DATA 74,o,o
[GUI ] 5326 DATA "found guilty by         unamimous verdict, & sentenced  to death. But in their          celebrations a door is left     unguarded ...",566,566,571,561,o,"1Cor10v13 or Phil1v21","a choice only you couldmake."
[GUI ] 5327 DATA 7,o,27,o,63,o,o
[GUI ] 5331 DATA "joined by a companion & another man who says, 'I always show great respect to a         religious man who is rich. What do you think ?'",576,o,"Jas2v1-8","mr Lovegain."
[GUI ] 5332 DATA 51,o
[GUI ] 5336 DATA "whipped, cut & burnt at the stake. You are carried off  through the clouds ...",581,o,"Acts7v56",""
[GUI ] 5337  DATA o
[GUI ] 5341 DATA "followed by Love-gain & three others who talk amongst   themselves. They try again to   engage you in conversation.",586,o,"2Tim2v23",""
[GUI ] 5342 DATA 64,o
[GUI ] 5346 DATA "asked by Love-gain & hiscompanions 'What is wrong with  being religious to obtain       blessing in this life ?'",591,o,"Jn6v27",""
[GUI ] 5347 DATA 62,o
[GUI ] 5351 DATA "at the foot of a hill   called Lucre. 'Turn aside & I   will show you something,' says  a man.",611,611,611,611,611,606,596,o,"2Tim4v10","Demas."
[GUI ] 5352 DATA 12,o,1,o,2,o,3,o,4,o,54,o,65,o
[GUI ] 5356 DATA "on the road heading     east. But here is an ancient    monument of a woman. It is      inscribed Gen19v26.",618,621,616,o,"Phil3v13","Lot's wife !"
[GUI ] 5357 DATA 41,52,o,30,o,3,o
[GUI ] 5361 DATA "passing through pleasantfields by a river (Ps23). The   road is getting narrow. A broad path branches off & follows the river further.",626,631,o,"Mat7v13-14",""
[GUI ] 5362 DATA 30,o,66,o
[GUI ] 5366 DATA "on a path. It is easy onthe feet. Nightfall is fast     approaching. Ahead of you       Vain-confidence slips & falls   into a deep pit.",636,o,"Ps119v105",""
[GUI ] 5367 DATA o
[GUI ] 5371 DATA "caught in a storm.",646,641,o,"Ps119v105",""
[GUI ] 5372 DATA 80,o,o
[GUI ] 5376 DATA "in a dungeon. There is alarge oak door ahead of you.    Other chambers lead off to the  east, west & south.",651,656,661,666,671,676,o,"Heb11",""
[GUI ] 5377 DATA 3,o,4,o,2,o,27,o,7,o,20,o
[GUI ] 5381 DATA "in a chamber with many  old & dusty skulls !",681,o,"2Cor1v20",""
[GUI ] 5382 DATA o
[GUI ] 5386 DATA "in a chamber. Through   the wall you can here No-faith, the giants wife, say 'Make them destroy themselves.'",686,o,"Heb11",""
[GUI ] 5387 DATA o
[GUI ] 5391 DATA "in a torture chamber    filled with gruesome instrumentsof torture !",691,o,"Mat28v20",""
[GUI ] 5392 DATA o
[GUI ] 5396 DATA "standing outside a smallhut. Through a crack in the dooryou can see smoke rising from a deep pit !. Paths lead to Mount Error & Mount Caution.",696,696,696,701,706,711,o,"Job33v24",""
[GUI ] 5397 DATA 7,o,26,o,67,o,69,o,68,o,o
[GUI ] 5401 DATA "at the top of Mount     Caution & can see men wandering blindly among grave stones. The shepherds explain 'These men are victims of the giant Despair.'",716,o,"Col1v28",""
[GUI ] 5402 DATA o
[GUI ] 5406 DATA "at the top of Mount     Error & can see the bones of menwho have turned aside from the  Truth & fallen to their death.",721,o,"2Pet2v18-22",""
[GUI ] 5407 DATA 5,o
[GUI ] 5411 DATA "inside. Looking down yousee a dark pit from which       swirling smoke rises.",726,731,o,"Prov15v24","a route to hell !"
[GUI ] 5412 DATA 70,o,o
[GUI ] 5416 DATA "{C}JPH.DAY 1984"
[GUI ] 5421 DATA "at a high ridge called  Clear. You can just see the     gates of the \020\000Heavenly City. The shepherds leave after warning   you, 'Do not sleep on enchanted ground.'",741,o,"Rev21v12-14",""
[GUI ] 5422 DATA o
[GUI ] 5426 DATA "joined by someone very  conceited & certain he knows    everything.",746,o,"Jas3v17","Ignorance."
[GUI ] 5427 DATA o
[GUI ] 5431 DATA "met by \020\000Mr Turnaway. He  cannot follow as he is bound by 7 devils & carried off to the   pit.",751,756,o,"Lk11v26","a man who turned away  from faith."
[GUI ] 5432 DATA 71,o,o
[GUI ] 5436 DATA "attacked by 3 rogues-   Mistrust, Faint-heart & Guilt.",761,761,761,o,"Eph2v5-8",""
[GUI ] 5437 DATA 20,o,22,o,28,o
[GUI ] 5441 DATA "greeted by a man in     white robes who says, 'I am     going to the  Celestial City    follow me ...' He goes west but the road continues south.",766,771,o,"Mat24",""
[GUI ] 5442 DATA 2,o,4,o,o
[GUI ] 5446 DATA "led into a net & become stuck (Prov 29v5).",776,o,"Is1v18-20",""
[GUI ] 5447 DATA 32,o
[GUI ] 5451 DATA "stopped by the sound of laughter. A man is laughing     at you. 'There is no place as   you dream of in this world -    return with me.'",781,786,o,"Phil3v20","Mr Atheist."
[GUI ] 5452 DATA 52,o,o
[GUI ] 5456 DATA "on enchanted ground.    You are very sleepy.",791,796,o,"Rom13v11-14",""
[GUI ] 5457 DATA 49,o,o
[GUI ] 5461 DATA "approached by Ignorance.You ask him, 'Do you know THE   LORD ?' He replies 'I have liveda good life.'",811,o,"Rom3v10,Mat7v21-22,Rom3v23-26",""
[GUI ] 5462 DATA 81,o
[GUI ] 5466 DATA "in Beulah Land, here    the sun shines night & day over beautiful gardens, you now have a clear view of the Heavenly    City. These are the King's      gardens !",816,o,"Rev21",""
[GUI ] 5467 DATA 72,o
[GUI ] 5471 DATA "at a wide river that youmust cross. The glory of the    Heavenly City is so bright you  cannot look at it with the nakedeye.",821,826,o,"Acts7v36-38",""
[GUI ] 5472 DATA 73,o,o
[GUI ] 5476 DATA "at the bottom of the    hill on which the City stands.",831,o,"Is12",""
[GUI ] 5477 DATA 6,o,o
[GUI ] 5481 DATA "at the gates of the City. The King's trumpeters salute  you !",836,o,"Rev22v1-5",""
[GUI ] 5482 DATA o
[GUI ] 5486 DATA "greeted by Enoch, Moses & Elijah, they ask for your     scrolls.",841,841,846,o,"Mat22v11-12",""
[GUI ] 5487 DATA 36,44,o,36,o,o,o
[GUI ] 5491 DATA "in HEAVEN. You are      ushered into the presence of theKING, who says 'Well done my    good & faithful servant.'",851,o,"you don't need any help but if  you have enjoyed this game,     watch out for other SCRIPTURE   UNION/ANNO DOMINI productions.","{C} J.P.H. Day 1984" 
[GUI ] 5492 DATA o
[GUI ] 5496 [302 bytes of data hidden by Inkspector]
[GUI ] 5497 DATA 27,o,7,o,29,o,o,o
[GUI ] 5501 DATA "outside your house      seeking inspiration as to what  to do. All exits to the city    are barred.",20,21,o,"Is30v27-28",""
[GUI ] 5502 DATA 26,o,o,o
[GUI ] 5506 DATA "still in the street,    which is strangely deserted.    Perhaps the book that was in    your bedroom might help !",20,o,"Is30v27-28",""
[GUI ] 5507 DATA 26,o
[GUI ] 5511 DATA "in a thick forest which lines the hillside opposite the gate.",858,858,860,o,"Mat7v13-14",""
[GUI ] 5512 DATA 52,o,29,o,o,o
[GUI ] 5516 DATA "outside an imposing and sinister castle. You are drawn  towards a dark doorway which is just ajar.",858,858,862,o,"Ps53","The Devils Castle."
[GUI ] 5517 DATA 29,o,52,o,o
[GUI ] 5521 DATA "in a pitch black room.  There is a faint smell of       sulphur ! Two red eyes are      studying you intently.",858,858,726,o,"Mat3v7-10","something evil."
[GUI ] 5522 DATA 29,o,52,o,o
[GUI ] 5526 DATA "caught in a thicket. It seems to be easier to return    than continue.",136,136,o,"Is44v21-22",""
[GUI ] 5527 DATA 29,o,52,o
[GUI ] 5531 DATA "met on the road by      Evangelist. 'I see from your    lack of armour that you have notvisited my friend Discretion.   You must return to him or you   will surely perish. I have      warned you before about short   cuts.'",864,864,o,"Is30v15",""
[GUI ] 5532 DATA 29,o,52,o
[GUI ] 6000 LET isc=INT (scr/12)
[GUI ] 6001 PRINT "That's the end of the pilgrimagefor you... you scored " ; isc ;: LET ret=6002: GO TO 6500 
[GUI ] 6002 BRIGHT 0: FLASH 0
[GUI ] 6003 LET ret=6010: LET tune=8040: GO TO 7000
[GUI ] 6010 PRINT "Press ENTER to play again": INPUT LINE s$: GO TO 1
[GUI ] 6500 PRINT F$
[GUI ] 6505 PRINT z$
[GUI ] 6595 GO TO ret
[GUI ] 7000 RESTORE tune
[GUI ] 7002 READ tul,durn
[GUI ] 7005 FOR i=1 TO tul: READ pitch
[GUI ] 7010 BEEP durn,pitch
[GUI ] 7015 NEXT i
[GUI ] 7020 GO TO ret
[GUI ] 8000 DATA 4,2,-15,-20,-25,-30
[GUI ] 8010 [245 bytes of data hidden by Inkspector]
[GUI ] 8030 DATA 6,.5,6,6,6,8,4,6
[GUI ] 8040 [73 bytes of data hidden by Inkspector]
[GUI ] 9001  DATA "n","north",h$
[GUI ] 9002  DATA "s","south",h$
[GUI ] 9003 DATA "e","east",h$
[GUI ] 9004 DATA "w","west",h$
[GUI ] 9005 DATA "d","down",h$
[GUI ] 9006 DATA "u","up",h$
[GUI ] 9007 DATA "door",h$
[GUI ] 9008  DATA "mat6v19-24",h$
[GUI ] 9009  DATA "acts2v3-4",h$
[GUI ] 9010  DATA "book",h$
[GUI ] 9011  DATA "run","go",h$
[GUI ] 9012  DATA "onward","forward","continue",h$
[GUI ] 9013 DATA "ask","question","?","what","where","why","when","who",h$
[GUI ] 9014  DATA "evangelist","man",h$
[GUI ] 9015 DATA "rom8v37",h$
[GUI ] 9016  DATA "acts6v4-6",h$
[GUI ] 9017 DATA "2pet3",h$
[GUI ] 9018 DATA "walk",h$
[GUI ] 9019 DATA "eat","food","meal",h$
[GUI ] 9020 DATA "faith",h$
[GUI ] 9021 DATA "read",h$
[GUI ] 9022 DATA "pray",h$
[GUI ] 9023 DATA "family",h$
[GUI ] 9024 DATA "get",h$
[GUI ] 9025 DATA "window",h\020\001\020\000$
[GUI ] 9026 DATA "in","door",h$
[GUI ] 9027 DATA "out","door",h$
[GUI ] 9028 DATA "help",h$
[GUI ] 9029 DATA "leave","out","away",h$
[GUI ] 9030 DATA "road",h$
[GUI ] 9031 DATA "knock",h$
[GUI ] 9032 DATA "repent",h$
[GUI ] 9033 DATA "follow",h$
[GUI ] 9034 DATA "wash",h$
[GUI ] 9035 DATA "sweep",h$
[GUI ] 9036 DATA "give","present","show","hand",h$
[GUI ] 9037 DATA "patience",h$
[GUI ] 9038 DATA "passion",h$
[GUI ] 9039 DATA "spend","take",h$
[GUI ] 9040 DATA "attack","fight",h$
[GUI ] 9041 DATA "look",h$
[GUI ] 9042 DATA "gaze",h$
[GUI ] 9043 DATA "kneel","thank",h$
[GUI ] 9044 DATA "scroll",h$
[GUI ] 9045 DATA "drink",h$
[GUI ] 9046 DATA "water",h$
[GUI ] 9047 DATA "lap","sip",h$
[GUI ] 9048 DATA "hill","refuse","no",h$
[GUI ] 9049 DATA "sleep",h$
[GUI ] 9050 DATA "continue","awake","onward","resist",h$
[GUI ] 9051 DATA "poor","favouritism","preference","discrimination","judgement",h$
[GUI ] 9052 DATA "return","back",h$
[GUI ] 9053 DATA "yes",h$
[GUI ] 9054 DATA "no",h$
[GUI ] 9055 DATA "armour",h$
[GUI ] 9056 DATA "stand","stay",h$
[GUI ] 9057 DATA "firm","ground",h$
[GUI ] 9058 DATA "sword",h$
[GUI ] 9059 DATA "healing",h$
[GUI ] 9060 DATA "thanks",h$
[GUI ] 9061 DATA "strong","weak","rubbish","shame","foolish",h$
[GUI ] 9062 DATA "fade","rust","labour","perishes","endures","heaven","eternal",h$
[GUI ] 9063 DATA "escape","flee",h$
[GUI ] 9064 DATA "ignore","avoid",h$
[GUI ] 9065 DATA "turn",h$
[GUI ] 9066 DATA "path",h$
[GUI ] 9067 DATA "hut",h$
[GUI ] 9068 DATA "error",h$
[GUI ] 9069 DATA "caution",h$
[GUI ] 9070 DATA "pit","jump","in",h$
[GUI ] 9071 DATA "flee",h$
[GUI ] 9072 DATA "city",h$
[GUI ] 9073 DATA "swim","water",h$
[GUI ] 9074 DATA "continue","god","example","good","sin","worldly",h$
[GUI ] 9075 DATA "futile","tongue","control","boast","teach","worthless","pointless","argument","unsound",h$
[GUI ] 9076 DATA "pride","fall","boast",h$
[GUI ] 9077 DATA "salvation","helmet","spirit","word",h$
[GUI ] 9078 DATA "drink","water","come",h$
[GUI ] 9079 DATA "avoid","ignore",h$
[GUI ] 9080 DATA "path","word","lamp","light",h$
[GUI ] 9081  DATA "all","sinned","fallen","blood","grace",h$
[GUI ] 9082 DATA "warn",h$
[GUI ] 9083 DATA " "
[GUI ] 9100 INK 1: PAPER 7: CLS : PRINT "  Loading Program please wait  "
[GUI ] 9110 POKE 23614,61: POKE 23613,4
[GUI ] 9202 SAVE "progress"CODE 16384,45000
[GUI ] 9203 PRINT "\020\001STOP THE TAPE\020\000 PRESS ENTER KEY"
[GUI ] 9204 INPUT LINE s$
[GUI ] 9205 RUN 
[GUI ] <<< BASIC Program End
